home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD BIT 75
/
CD BIT 75.iso
/
Software
/
LogOut
/
disk1
/
_SETUP.1
/
GCondom7.exe
/
0
/
RCDATA
/
TFRMVARIOSDOCUMENTOS
/
TFRMVARIOSDOCUMENTOS.txt
Wrap
Text File
|
2004-10-21
|
14KB
|
570 lines
object frmVariosDocumentos: TfrmVariosDocumentos
Left = 632
Top = 228
BorderStyle = bsNone
Caption = 'V�rios Documentos'
ClientHeight = 358
ClientWidth = 573
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnCreate = FormCreate
OnDestroy = FormDestroy
PixelsPerInch = 96
TextHeight = 13
object Shape1: TShape
Left = 0
Top = 0
Width = 573
Height = 358
Align = alClient
end
object Label1: TLabel
Left = 8
Top = 56
Width = 341
Height = 13
Caption = 'Seleccione os documentos que deseja inclu�r no movimento'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label61: TLabel
Left = 8
Top = 16
Width = 65
Height = 13
Caption = 'Ordenada por'
Transparent = True
end
object Label62: TLabel
Left = 184
Top = 16
Width = 58
Height = 13
Caption = 'Procurar por'
Transparent = True
end
object Label2: TLabel
Left = 8
Top = 296
Width = 243
Height = 29
Caption = 'Lista de Documentos'
Font.Charset = ANSI_CHARSET
Font.Color = clGray
Font.Height = -24
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object RxLabel2: TRxLabel
Left = 549
Top = 51
Width = 10
Height = 17
Alignment = taRightJustify
Caption = '0'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
Transparent = True
end
object RxDBGrid1: TRxDBGrid
Left = 9
Top = 70
Width = 552
Height = 199
Color = 14413786
Ctl3D = False
DataSource = DataSource1
FixedColor = 13551795
Options = [dgTitles, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgMultiSelect]
ParentCtl3D = False
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
OnDblClick = RxDBGrid1DblClick
MultiSelect = True
Columns = <
item
Expanded = False
FieldName = 'N�'
Title.Alignment = taCenter
Title.Caption = 'N�mero'
Visible = True
end
item
Alignment = taCenter
Expanded = False
FieldName = 'Data'
Title.Alignment = taCenter
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'Nome'
Title.Alignment = taCenter
Width = 150
Visible = True
end
item
Expanded = False
FieldName = 'Referente'
Title.Alignment = taCenter
Width = 150
Visible = True
end
item
Expanded = False
FieldName = 'Valor1'
Title.Alignment = taCenter
Title.Caption = 'Valor'
Width = 90
Visible = True
end>
end
object BitBtn1: TBitBtn
Left = 400
Top = 316
Width = 75
Height = 25
TabOrder = 1
Kind = bkOK
end
object BitBtn2: TBitBtn
Left = 480
Top = 316
Width = 75
Height = 25
Cancel = True
Caption = 'Cancelar'
ModalResult = 2
TabOrder = 2
Glyph.Data = {
52050000424D5205000000000000420000002800000024000000120000000100
1000030000001005000000000000000000000000000000000000007C0000E003
00001F000000E03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03D
E03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DFF7FFF7FFF7FFF7F
FF7FE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DEF3DEF3DEF3D
EF3DEF3DEF3DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DFF7FEF3D
EF3DEF3DEF3DEF3DEF3DFF7FFF7FFF7FE03DE03DE03DE03DE03DE03DE03DEF3D
EF3D003C003C003C003C003C003CEF3DEF3DE03DE03DE03DE03DE03DE03DE03D
E03DEF3DEF3DE03DE03DFF7FFF7FFF7FE03DEF3DEF3DFF7FFF7FE03DE03DE03D
E03DE03DEF3D003C003C003C007C007C007C007C003C003C003CEF3DE03DE03D
E03DE03DE03DE03DEF3DFF7FE03DE03DEF3DEF3DEF3DEF3DFF7FE03DE03DEF3D
FF7FFF7FE03DE03DE03D007C003C003C007C007CE03DE03DE03DE03D003C003C
003C003CEF3DE03DE03DE03DE03DEF3DFF7FE03DEF3DEF3DE03DE03DE03DE03D
EF3DE03DE03DE03DEF3DFF7FE03DE03DE03D007C003C003CE03DE03DE03DE03D
E03DEF3D003C003C003C003CEF3DE03DE03DE03DE03DEF3DFF7FEF3DFF7FE03D
E03DE03DE03DEF3DE03DE03DFF7FE03DEF3DFF7FE03DE03D007C003C003CEF3D
E03DE03DE03DE03DEF3D003C003C003C007C003C003CEF3DE03DE03DEF3DFF7F
E03DEF3DFF7FE03DE03DE03DEF3DE03DE03DFF7FEF3DFF7FE03DEF3DFF7FE03D
007C003CEF3DE03DE03DE03DE03DEF3D003C003C003C007CE03D007C003CEF3D
E03DE03DEF3DFF7FEF3DFF7FE03DE03DE03DEF3DE03DE03DFF7FEF3DE03DEF3D
FF7FEF3DFF7FE03D007C003CEF3DE03DE03DE03DEF3D003C003C003C007CE03D
E03D007C003CEF3DE03DE03DEF3DFF7FEF3DFF7FE03DE03DEF3DE03DE03DFF7F
EF3DE03DE03DEF3DFF7FEF3DFF7FE03D007C003CEF3DE03DE03DEF3D003C003C
003C007CE03DE03DE03D007C003CEF3DE03DE03DEF3DFF7FEF3DFF7FE03DEF3D
E03DE03DFF7FEF3DE03DE03DE03DEF3DFF7FEF3DFF7FE03D007C003CEF3DE03D
EF3D003C003C003C007CE03DE03DE03DE03D007C003CEF3DE03DE03DEF3DFF7F
EF3DFF7FEF3DE03DE03DFF7FEF3DE03DE03DE03DE03DEF3DE03DEF3DFF7FE03D
007C003C003CEF3D003C003C003C007CE03DE03DE03DE03D007C003C003CEF3D
E03DE03DEF3DFF7FE03DEF3DE03DE03DFF7FEF3DE03DE03DE03DE03DEF3DE03D
E03DEF3DE03DE03DE03D007C003C003C003C003C007CE03DE03DE03DE03DE03D
007C003CEF3DE03DE03DE03DE03DEF3DFF7FE03DE03DFF7FEF3DE03DE03DE03D
FF7FFF7FEF3DE03DEF3DFF7FE03DE03DE03D007C003C003C003CEF3DE03DE03D
E03DE03DEF3D003C003C003CEF3DE03DE03DE03DE03DEF3DFF7FE03DE03DEF3D
FF7FFF7FFF7FFF7FEF3DEF3DE03DFF7FEF3DE03DE03DE03DE03DE03D007C003C
003C003CEF3DEF3DEF3DEF3D003C003C003CEF3DE03DE03DE03DE03DE03DE03D
EF3DFF7FFF7FE03DEF3DEF3DEF3DEF3DE03DFF7FFF7FEF3DE03DE03DE03DE03D
E03DE03DE03D007C007C003C003C003C003C003C003C007C007CE03DE03DE03D
E03DE03DE03DE03DE03DEF3DEF3DFF7FFF7FFF7FFF7FFF7FFF7FEF3DEF3DE03D
E03DE03DE03DE03DE03DE03DE03DE03DE03D007C007C007C007C007C007CE03D
E03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DEF3DEF3DEF3DEF3DEF3D
EF3DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03D
E03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03D
E03DE03DE03DE03DE03DE03DE03DE03DE03DE03DE03D}
NumGlyphs = 2
end
object ComboBox4: TComboBox
Left = 80
Top = 16
Width = 81
Height = 21
Hint = 'Muda a ordena��o da lista'
Style = csDropDownList
Color = clInfoBk
ItemHeight = 13
ParentShowHint = False
ShowHint = True
TabOrder = 3
OnChange = ComboBox4Change
Items.Strings = (
'Data'
'N�mero'
'Nome')
end
object Edit4: TEdit
Left = 248
Top = 16
Width = 261
Height = 21
Hint = 'Texto a procurar, dependendo da ordena��o'
Color = clInfoBk
Ctl3D = True
ParentCtl3D = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
OnChange = Edit4Change
end
object TabSet1: TTabSet
Left = 11
Top = 268
Width = 552
Height = 20
BackgroundColor = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
SelectedColor = 14413786
Tabs.Strings = (
'Recibos'
'Notas de Pagamento')
TabIndex = 0
OnChange = TabSet1Change
end
object DataSource1: TDataSource
DataSet = Table1
Left = 40
Top = 104
end
object Table1: TTable
DatabaseName = 'Database1'
Filtered = True
FieldDefs = <
item
Name = 'ID'
DataType = ftInteger
end
item
Name = 'N�'
DataType = ftInteger
end
item
Name = 'Data'
Attributes = [faRequired]
DataType = ftDate
end
item
Name = 'Nome'
Attributes = [faRequired]
DataType = ftString
Size = 50
end
item
Name = 'Referente'
DataType = ftString
Size = 50
end
item
Name = 'Valor1'
Attributes = [faRequired]
DataType = ftFloat
end
item
Name = 'Valor2'
DataType = ftFloat
end
item
Name = 'Fraccao'
DataType = ftString
Size = 15
end
item
Name = 'Piso'
DataType = ftString
Size = 15
end
item
Name = 'Porta'
DataType = ftString
Size = 10
end
item
Name = 'C�digo'
DataType = ftInteger
end
item
Name = 'Contribuinte'
DataType = ftString
Size = 12
end
item
Name = 'Tipo Documento'
DataType = ftString
Size = 20
end
item
Name = 'Permilagem'
DataType = ftString
Size = 8
end
item
Name = 'Data Limite'
DataType = ftDate
end
item
Name = 'Tipo Pagamento'
DataType = ftString
Size = 15
end
item
Name = 'Anulado'
DataType = ftBoolean
end
item
Name = 'Rela��o'
DataType = ftInteger
end
item
Name = 'Liquidado'
DataType = ftBoolean
end
item
Name = 'Observa��es'
DataType = ftMemo
Size = 240
end
item
Name = '�rea'
DataType = ftFloat
end
item
Name = 'Original'
DataType = ftBoolean
end
item
Name = 'Honor�rios'
DataType = ftFloat
end
item
Name = 'Lan�a G�s'
DataType = ftBoolean
end
item
Name = 'Leitura Anterior'
DataType = ftFloat
end
item
Name = 'Leitura Actual'
DataType = ftFloat
end
item
Name = 'Consumo'
DataType = ftFloat
end
item
Name = 'Pre�o Unit�rio G�s'
DataType = ftFloat
end
item
Name = 'Valor Pagar'
DataType = ftFloat
end
item
Name = 'Aluguer Contador'
DataType = ftFloat
end
item
Name = 'Taxa de Servi�o'
DataType = ftFloat
end
item
Name = 'Outros Servi�os'
DataType = ftFloat
end
item
Name = 'Por Liquidar'
DataType = ftFloat
end
item
Name = 'N� Cheque'
DataType = ftString
Size = 15
end
item
Name = 'Pago'
DataType = ftBoolean
end
item
Name = 'Apartamento'
DataType = ftString
Size = 15
end
item
Name = 'BancoCH'
DataType = ftString
Size = 10
end
item
Name = 'DataCH'
DataType = ftDate
end>
StoreDefs = True
TableName = 'Recibos.DB'
Left = 8
Top = 104
object Table1ID: TIntegerField
FieldName = 'ID'
end
object Table1N: TIntegerField
FieldName = 'N�'
end
object Table1Data: TDateField
FieldName = 'Data'
Required = True
end
object Table1Nome: TStringField
FieldName = 'Nome'
Required = True
Size = 50
end
object Table1Referente: TStringField
FieldName = 'Referente'
Size = 50
end
object Table1Valor1: TFloatField
FieldName = 'Valor1'
Required = True
end
object Table1Valor2: TFloatField
FieldName = 'Valor2'
end
object Table1Fraccao: TStringField
FieldName = 'Fraccao'
Size = 15
end
object Table1Piso: TStringField
FieldName = 'Piso'
Size = 15
end
object Table1Porta: TStringField
FieldName = 'Porta'
Size = 10
end
object Table1Cdigo: TIntegerField
FieldName = 'C�digo'
end
object Table1Contribuinte: TStringField
FieldName = 'Contribuinte'
Size = 12
end
object Table1TipoDocumento: TStringField
FieldName = 'Tipo Documento'
end
object Table1Permilagem: TStringField
FieldName = 'Permilagem'
Size = 8
end
object Table1DataLimite: TDateField
FieldName = 'Data Limite'
end
object Table1TipoPagamento: TStringField
FieldName = 'Tipo Pagamento'
Size = 15
end
object Table1Anulado: TBooleanField
FieldName = 'Anulado'
end
object Table1Relao: TIntegerField
FieldName = 'Rela��o'
end
object Table1Liquidado: TBooleanField
FieldName = 'Liquidado'
end
object Table1Observaes: TMemoField
FieldName = 'Observa��es'
BlobType = ftMemo
Size = 240
end
object Table1rea: TFloatField
FieldName = '�rea'
end
object Table1Original: TBooleanField
FieldName = 'Original'
end
object Table1Honorrios: TFloatField
FieldName = 'Honor�rios'
end
object Table1LanaGs: TBooleanField
FieldName = 'Lan�a G�s'
end
object Table1LeituraAnterior: TFloatField
FieldName = 'Leitura Anterior'
end
object Table1LeituraActual: TFloatField
FieldName = 'Leitura Actual'
end
object Table1Consumo: TFloatField
FieldName = 'Consumo'
end
object Table1PreoUnitrioGs: TFloatField
FieldName = 'Pre�o Unit�rio G�s'
end
object Table1ValorPagar: TFloatField
FieldName = 'Valor Pagar'
end
object Table1AluguerContador: TFloatField
FieldName = 'Aluguer Contador'
end
object Table1TaxadeServio: TFloatField
FieldName = 'Taxa de Servi�o'
end
object Table1OutrosServios: TFloatField
FieldName = 'Outros Servi�os'
end
object Table1PorLiquidar: TFloatField
FieldName = 'Por Liquidar'
end
object Table1NCheque: TStringField
FieldName = 'N� Cheque'
Size = 15
end
object Table1Pago: TBooleanField
FieldName = 'Pago'
end
object Table1Apartamento: TStringField
FieldName = 'Apartamento'
Size = 15
end
object Table1BancoCH: TStringField
FieldName = 'BancoCH'
Size = 10
end
object Table1DataCH: TDateField
FieldName = 'DataCH'
end
end
end